﻿
Imports TorneosBackEnd

Public Class Insertar

    Private Sub btnGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGuardar.Click

        Dim negocio As New JuegoNegocio
        Try

            negocio.insertar(Me.TxtNombre.Text, Me.Txtversion.Text, Me.TxtFabrica.Text)

            MsgBox("Insertado :D")

            Me.Close()



        Catch ex As Exception


        End Try
    End Sub

    Private Sub Insertar_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub BtnCancelar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnCancelar.Click
        Me.Close()
    End Sub
End Class